;;vimascript================
[@]
{
#IF
#SAY
ǰΪ<$USERFAME>ӭʹƷ:\\
<[õ300]/@FameBuy(õ,1,300)> ĹЧ\
<[˼ĸ1000]/@FameBuy(˼ĸ,1,1000)> ʧ,κװ\\

<[ˮС50]/@FameBuy(ˮС,1,50)>\
<[ȻˮС50]/@FameBuy(ȻˮС,1,50)>\
<[ˮС50]/@FameBuy(ˮС,1,50)>\
<[ˮС50]/@FameBuy(ˮС,1,50)>\
<[ǿЧˮС50]/@FameBuy(ǿЧˮС,1,50)>\
<[ħǿЧˮС50]/@FameBuy(ħǿЧˮС,1,50)>\
<[ˮУ100]/@FameBuy(ˮУ,1,100)>\
<[ȻˮУ100]/@FameBuy(ȻˮУ,1,100)>\
<[ˮУ100]/@FameBuy(ˮУ,1,100)>\ 
<[ˮУ100]/@FameBuy(ˮУ,1,100)>\
<[ǿЧˮУ100]/@FameBuy(ǿЧˮУ,1,100)>\ 
<[ħǿЧˮУ100]/@FameBuy(ħǿЧˮУ,1,100)>\
<[ˮ󣩡500]/@FameBuy(ˮ,1,500)>\ 
<[Ȼˮ󣩡500]/@FameBuy(Ȼˮ,1,500)>\
<[ˮ󣩡500]/@FameBuy(ˮ,1,500)>\ 
<[ˮ󣩡500]/@FameBuy(ˮ,1,500)>\
<[ǿЧˮ󣩡500]/@FameBuy(ǿЧˮ,1,500)>\ 
<[ħǿЧˮ󣩡500]/@FameBuy(ħǿЧˮ,1,500)>\
<[ˮأ1000]/@FameBuy(ˮأ,1,1000)>\ 
<[Ȼˮأ1000]/@FameBuy(Ȼˮأ,1,1000)>\
<[ˮأ1000]/@FameBuy(ˮأ,1,1000)>\ 
<[ˮأ1000]/@FameBuy(ˮأ,1,1000)>\
<[ǿЧˮأ1000]/@FameBuy(ǿЧˮأ,1,1000)>\
<[ħǿЧˮأ1000]/@FameBuy(ħǿЧˮأ,1,1000)>\
<[ƻ2000]/@FameBuy(ƻ,1,2000)> <[2000]/@FameBuy(,1,2000)>\
<[ƻ4000]/@FameBuy(ƻ,1,4000)>\\

<[ʥ󣩡350]/@FameBuy(ʥ,1,350)>\ 
<[ڻ󣩡350]/@FameBuy(ڻ,1,350)>\
<[绤󣩡350]/@FameBuy(绤,1,350)>\ 
<[׻󣩡350]/@FameBuy(׻,1,350)>\
<[󣩡350]/@FameBuy(,1,350)>\ 
<[滤󣩡350]/@FameBuy(滤,1,350)>\
<[󣩡350]/@FameBuy(,1,350)>\      
<[껤󣩡7000]/@FameBuy(껤,1,7000)>\
<[ɫҩۣ󣩡350]/@FameBuy(ɫҩۣ,1,350)>\    
<[ɫҩۣ󣩡350]/@FameBuy(ɫҩۣ,1,350)>\\
<[ħʯ󣩡350]/@FameBuy(ħʯ,1,350)>\\
<[ħʯ󣩡350]/@FameBuy(ħʯ,1,350)>\\
<[ħʯ󣩡350]/@FameBuy(ħʯ,1,350)>\\
<[ħʯ󣩡350]/@FameBuy(ħʯ,1,350)>\\
</@back>\

[@FameBuy()]
#IF
#ACT
mov A0 %ARG(1)
mov D0 %ARG(2)
mov D1 %ARG(3)

#IF
CHECKFAME %D1
#ACT
actcmd SETFAME - %D1
give %A0 %D0
sysmsg "ɹʹ<$OUTPUT(D1)>һ<$OUTPUT(D0)><$OUTPUT(A0)>"
#ELSEACT
break
#ELSESAY
ԲĵǰΪ<$USERFAME><$OUTPUT(D1)>ܶһƷ\\
</@back>
}
;;vimascript===============